﻿Module Module8
    Sub Main()
        ' 初值自動設為0
        Dim N As Integer
        For i As Integer = 1 To 10
            N += i
        Next
        Console.WriteLine("N = " & N)
        Console.ReadKey()

        ' 初值為空字串
        Dim S As String = ""
        For i As Integer = 1 To 10
            S &= i
        Next
        Console.WriteLine("S = " & S)
        Console.ReadKey()
    End Sub
End Module
